home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / SQL and Data Base / Logic Works ERwin 3.5 / data.1 / ERTMPL32.DLL / RCDATA / 613 < prev    next >
Unknown  |  1998-01-30  |  620 b 
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 43 48 49 4c 44 20 44 45 | 4c 45 54 45 20 52 45 53 |CHILD DE|LETE RES|
|00000010| 54 52 49 43 54 00 20 20 | 20 20 2f 2a 20 45 52 77 |TRICT.  |  /* ERw|
|00000020| 69 6e 20 42 75 69 6c 74 | 69 6e 20 25 44 61 74 65 |in Built|in %Date|
|00000030| 74 69 6d 65 20 2a 2f 0d | 0a 20 20 20 20 2f 2a 20 |time */.|.    /* |
|00000040| 25 50 61 72 65 6e 74 20 | 25 56 65 72 62 50 68 72 |%Parent |%VerbPhr|
|00000050| 61 73 65 20 25 43 68 69 | 6c 64 20 4f 4e 20 43 48 |ase %Chi|ld ON CH|
|00000060| 49 4c 44 20 44 45 4c 45 | 54 45 20 52 45 53 54 52 |ILD DELE|TE RESTR|
|00000070| 49 43 54 20 2a 2f 0d 0a | 20 20 20 20 73 65 6c 65 |ICT */..|    sele|
|00000080| 63 74 20 3a 63 6e 74 31 | 20 3d 20 63 6f 75 6e 74 |ct :cnt1| = count|
|00000090| 28 2a 29 20 66 72 6f 6d | 20 25 50 61 72 65 6e 74 |(*) from| %Parent|
|000000a0| 0d 0a 20 20 20 20 20 20 | 77 68 65 72 65 0d 0a 20 |..      |where.. |
|000000b0| 20 20 20 20 20 20 20 2f | 2a 20 25 25 4a 6f 69 6e |       /|* %%Join|
|000000c0| 46 4b 50 4b 28 3a 6f 6c | 64 2c 25 50 61 72 65 6e |FKPK(:ol|d,%Paren|
|000000d0| 74 2c 22 20 3d 20 22 2c | 22 20 61 6e 64 22 29 20 |t," = ",|" and") |
|000000e0| 2a 2f 0d 0a 20 20 20 20 | 20 20 20 20 25 4a 6f 69 |*/..    |    %Joi|
|000000f0| 6e 46 4b 50 4b 28 3a 6f | 6c 64 2c 25 50 61 72 65 |nFKPK(:o|ld,%Pare|
|00000100| 6e 74 2c 22 20 3d 20 22 | 2c 22 20 61 6e 64 22 29 |nt," = "|," and")|
|00000110| 20 61 6e 64 0d 0a 20 20 | 20 20 20 20 20 20 28 30 | and..  |      (0|
|00000120| 20 3d 20 28 0d 0a 20 20 | 20 20 20 20 20 20 20 20 | = (..  |        |
|00000130| 73 65 6c 65 63 74 20 63 | 6f 75 6e 74 28 2a 29 20 |select c|ount(*) |
|00000140| 66 72 6f 6d 20 25 43 68 | 69 6c 64 0d 0a 20 20 20 |from %Ch|ild..   |
|00000150| 20 20 20 20 20 20 20 77 | 68 65 72 65 0d 0a 20 20 |       w|here..  |
|00000160| 20 20 20 20 20 20 20 20 | 20 20 2f 2a 20 25 25 4a |        |  /* %%J|
|00000170| 6f 69 6e 46 4b 50 4b 28 | 25 43 68 69 6c 64 2c 25 |oinFKPK(|%Child,%|
|00000180| 50 61 72 65 6e 74 2c 22 | 20 3d 20 22 2c 22 20 61 |Parent,"| = "," a|
|00000190| 6e 64 22 29 20 2a 2f 0d | 0a 20 20 20 20 20 20 20 |nd") */.|.       |
|000001a0| 20 20 20 20 20 25 4a 6f | 69 6e 46 4b 50 4b 28 25 |     %Jo|inFKPK(%|
|000001b0| 43 68 69 6c 64 2c 25 50 | 61 72 65 6e 74 2c 22 20 |Child,%P|arent," |
|000001c0| 3d 20 22 2c 22 20 61 6e | 64 22 29 0d 0a 20 20 20 |= "," an|d")..   |
|000001d0| 20 20 20 20 20 29 29 3b | 0d 0a 20 20 20 20 69 66 |     ));|..    if|
|000001e0| 20 28 28 63 6e 74 31 20 | 3e 20 30 29 29 0d 0a 20 | ((cnt1 |> 0)).. |
|000001f0| 20 20 20 74 68 65 6e 0d | 0a 20 20 20 20 20 20 72 |   then.|.      r|
|00000200| 61 69 73 65 20 65 72 72 | 6f 72 0d 0a 20 20 20 20 |aise err|or..    |
|00000210| 20 20 20 20 33 30 30 31 | 30 0d 0a 20 20 20 20 20 |    3001|0..     |
|00000220| 20 20 20 27 43 61 6e 6e | 6f 74 20 44 45 4c 45 54 |   'Cann|ot DELET|
|00000230| 45 20 6c 61 73 74 20 22 | 25 43 68 69 6c 64 22 20 |E last "|%Child" |
|00000240| 62 65 63 61 75 73 65 20 | 22 25 50 61 72 65 6e 74 |because |"%Parent|
|00000250| 22 20 65 78 69 73 74 73 | 2e 27 3b 0d 0a 20 20 20 |" exists|.';..   |
|00000260| 20 65 6e 64 69 66 3b 0d | 0a 00 20 27             | endif;.|.. '    |
+--------+-------------------------+-------------------------+--------+--------+